home *** CD-ROM | disk | FTP | other *** search
/ iBrowse Update Disc / iBrowse Update Disc.iso / distrib / boot / !Boot / Resources / !Shockwave / !Run < prev    next >
Text File  |  1997-10-17  |  2KB  |  55 lines
  1. | !Start file for the MacroMedia Shockwave "Plugin" for RISC OS version 1.4 (d24)
  2.  
  3. | Start up file to launch the Shockwave, this is executed from the
  4. | movie directories, by their !Run file.
  5.  
  6. If "<Shockwave$IsRunning>"="Yes" Then Error 0 The Shockwave Plugin is already running
  7.  
  8. Set Shockwave$Resource$Dir <Shockwave$Dir>
  9.  
  10. | Ensure any of our system extensions
  11.  
  12. RMEnsure AtomManager 1.01 RMLoad <Shockwave$Dir>.Modules.Atom
  13. RMEnsure AtomManager 1.01 Error AtomManager 1.00 needed
  14. RMReInit AtomManager
  15.  
  16. RMEnsure SoundWave 0.12 RMLoad <Shockwave$Dir>.Modules.SoundWave
  17. RMEnsure SoundWave 0.12 Error SoundWave module 0.12 needed
  18.  
  19. RMEnsure CDSupport 0.12 RMLoad <Shockwave$Dir>.Modules.CDSupport
  20. RMEnsure CDSupport 0.12 Error CDSupport module 0.12 needed
  21.  
  22. | Check if we are running on any NC
  23. Set NC True
  24. RMEnsure OSVersion 0.01 Set NC False
  25.  
  26. IF "<NC>"="True"  Then RMEnsure UtilityModule 4.52 RMEnsure CallASWI 0.01 RMLoad <Shockwave$Dir>.Modules.CallASWI 
  27.  
  28. IF "<NC>"="False" Then RMEnsure UtilityModule 3.70 RMEnsure CallASWI 0.01 RMLoad <Shockwave$Dir>.Modules.CallASWI
  29.  
  30. If "<STB$Type>" <> "" Then RMEnsure CallASWI 0.01 RMLoad <Shockwave$Dir>.Modules.CallASWI
  31.  
  32. | Check player version.  1024 for STB1 or RISC PC.  1025 for STB2
  33. Set Shockwave$MachineType 1025
  34. RMEnsure UtilityModule 3.61 Set Shockwave$MachineType 1024
  35.  
  36. | Check Wimp version. 1=> nested wimp
  37.  
  38. Set Shockwave$WimpVersion 1
  39. RMEnsure WindowManager 3.82 Set Shockwave$WimpVersion 0
  40.  
  41. | Ensure our slot, and then start the kick of the Shockwave executable
  42.  
  43. WimpSlot -min 1000K -max 1000k
  44.  
  45. Set Shockwave$HeapSize 4M
  46.  
  47. Set Shockwave$IsRunning Yes
  48.  
  49. Run <Shockwave$Dir>.Plugin -S -W10 %*0
  50.  
  51. If "<Navigator$Dir>" <> "" Then <Navigator$Dir>.Library.SetLims
  52.  
  53. UnSet Shockwave$IsRunning
  54.  
  55.